<script>on compareOthersglobal compareOtherscompareNscompareOscomparePscompareRscompareSscompareTscompareUscompareVscompareWscompareZsend compareOtherson compareNsglobal term, choice, thePictureif choice = "line 84 of card field 1"thenput "G084.PIC" into termput "G084.PIC" into thePictureshoTermend ifend compareNson compareOsglobal term, choice, thePictureif choice = "line 85 of card field 1"thenput "G085.PIC" into termput "G085.PIC" into thePictureshoTermelseif choice = "line 86 of card field 1"thenput "G086.PIC" into termput "G086.PIC" into thePictureshoTermelseif choice = "line 87 of card field 1"thenput "G087.PIC" into termput "G087.PIC" into thePictureshoTermelseif choice = "line 88 of card field 1"thenput "G088.PIC" into termput "G088.PIC" into thePictureshoTermelseif choice = "line 89 of card field 1"thenput "G089.PIC" into termput "G089.PIC" into thePictureshoTermelseif choice = "line 90 of card field 1"thenput "G090.PIC" into termput "G090.PIC" into thePictureshoTermQTMovie OpenMovie,Plain,"PLANETS:GLOSSARY:108GLO.AVI", "279,98",¬nocontroller,dontPaintWhite,loopend ifend ifend ifend ifend ifend ifend compareOson comparePsglobal term, choice, thePictureif choice = "line 91 of card field 1"thenput "G091.PIC" into termput "G091.PIC" into thePictureshoTermelseif choice = "line 92 of card field 1"thenput "G092.PIC" into termput "G092.PIC" into thePictureshoTermelseif choice = "line 93 of card field 1"thenput "G093.PIC" into termput "G093.PIC" into thePictureshoTermelseif choice = "line 94 of card field 1"thenput "G094.PIC" into termput "G094.PIC" into thePictureshoTermelseif choice = "line 95 of card field 1"thenput "G095.PIC" into termput "G095.PIC" into thePictureshoTermelseif choice = "line 96 of card field 1"thenput "G096.PIC" into termput "G096.PIC" into thePictureshoTermelseif choice = "line 97 of card field 1"thenput "G097.PIC" into termput "G097.PIC" into thePictureshoTermelseif choice = "line 98 of card field 1"thenput "G098.PIC" into termput "G098.PIC" into thePictureshoTermelseif choice = "line 99 of card field 1"thenput "G099.PIC" into termput "G099.PIC" into thePictureshoTermelseif choice = "line 100 of card field 1"thenput "G100.PIC" into termput "G100.PIC" into thePictureshoTermelseif choice = "line 101 of card field 1"thenput "G101.PIC" into termput "G101.PIC" into thePictureshoTermelseif choice = "line 102 of card field 1"thenput "G102.PIC" into termput "G102.PIC" into thePictureshoTermelseif choice = "line 103 of card field 1"thenput "G103.PIC" into termput "G103.PIC" into thePictureshoTermelseif choice = "line 104 of card field 1"thenput "G104.PIC" into termput "G104.PIC" into thePictureshoTermelseif choice = "line 105 of card field 1"thenput "G105.PIC" into termput "G105.PIC" into thePictureshoTermend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend comparePson compareRsglobal term, choice, thePictureif choice = "line 106 of card field 1"thenput "G106.PIC" into termput "G106.PIC" into thePictureshoTermelseif choice = "line 107 of card field 1"thenput "G107.PIC" into termput "G107.PIC" into thePictureshoTermelseif choice = "line 108 of card field 1"thenput "G108.PIC" into termput "G108.PIC" into thePictureshoTermelseif choice = "line 109 of card field 1"thenput "G109.PIC" into termput "G109.PIC" into thePictureshoTermelseif choice = "line 110 of card field 1"thenput "G110.PIC" into termput "G110.PIC" into thePictureshoTermelseif choice = "line 111 of card field 1"thenput "G111.PIC" into termput "G111.PIC" into thePictureshoTermelseif choice = "line 112 of card field 1"thenput "G112.PIC" into termput "G112.PIC" into thePictureshoTermelseif choice = "line 113 of card field 1"thenput "G113.PIC" into termput "G113.PIC" into thePictureshoTermelseif choice = "line 114 of card field 1"thenput "G114.PIC" into termput "G114.PIC" into thePictureshoTermend ifend ifend ifend ifend ifend ifend ifend ifend ifend compareRson compareSsglobal term, choice, thePictureif choice = "line 115 of card field 1"thenput "G115.PIC" into termput "G115.PIC" into thePictureshoTermelseif choice = "line 116 of card field 1"thenput "G116.PIC" into termput "G116.PIC" into thePictureshoTermelseif choice = "line 117 of card field 1"thenput "G117.PIC" into termput "G117.PIC" into thePictureshoTermelseif choice = "line 118 of card field 1"thenput "G118.PIC" into termput "G118.PIC" into thePictureshoTermelseif choice = "line 119 of card field 1"thenput "G119.PIC" into termput "G119.PIC" into thePictureshoTermelseif choice = "line 120 of card field 1"thenput "G120.PIC" into termput "G120.PIC" into thePictureshoTermelseif choice = "line 121 of card field 1"thenput "G121.PIC" into termput "G121.PIC" into thePictureshoTermelseif choice = "line 122 of card field 1"thenput "G122.PIC" into termput "G122.PIC" into thePictureshoTermelseif choice = "line 123 of card field 1"thenput "G123.PIC" into termput "G123.PIC" into thePictureshoTermelseif choice = "line 124 of card field 1"thenput "G124.PIC" into termput "G124.PIC" into thePictureshoTermelseif choice = "line 125 of card field 1"thenput "G125.PIC" into termput "G125.PIC" into thePictureshoTermelseif choice = "line 126 of card field 1"thenput "G126.PIC" into termput "G126.PIC" into thePictureshoTermelseif choice = "line 127 of card field 1"thenput "G127.PIC" into termput "G127.PIC" into thePictureshoTermelseif choice = "line 128 of card field 1"thenput "G128.PIC" into termput "G128.PIC" into thePictureshoTermelseif choice = "line 129 of card field 1"thenput "G129.PIC" into termput "G129.PIC" into thePictureshoTermelseif choice = "line 130 of card field 1"thenput "G130.PIC" into termput "G130.PIC" into thePictureshoTermelseif choice = "line 131 of card field 1"thenput "G131.PIC" into termput "G131.PIC" into thePictureshoTermelseif choice = "line 132 of card field 1"thenput "G132.PIC" into termput "G132.PIC" into thePictureshoTermelseif choice = "line 133 of card field 1"thenput "G133.PIC" into termput "G133.PIC" into thePictureshoTermelseif choice = "line 134 of card field 1"thenput "G134.PIC" into termput "G134.PIC" into thePictureshoTermelseif choice = "line 135 of card field 1"thenput "G135.PIC" into termput "G135.PIC" into thePictureshoTermelseif choice = "line 136 of card field 1"thenput "G136.PIC" into termput "G136.PIC" into thePictureshoTermelseif choice = "line 137 of card field 1"thenput "G137.PIC" into termput "G137.PIC" into thePictureshoTermelseif choice = "line 138 of card field 1"thenput "G138.PIC" into termput "G138.PIC" into thePictureshoTermend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend compareSson compareTsglobal term, choice, thePictureif choice = "line 139 of card field 1"thenput "G139.PIC" into termput "G139.PIC" into thePictureshoTermelseif choice = "line 140 of card field 1"thenput "G140.PIC" into termput "G140.PIC" into thePictureshoTermelseif choice = "line 141 of card field 1"thenput "G141.PIC" into termput "G141.PIC" into thePictureshoTermelseif choice = "line 142 of card field 1"thenput "G142.PIC" into termput "G142.PIC" into thePictureshoTermelseif choice = "line 143 of card field 1"thenput "G143.PIC" into termput "G143.PIC" into thePictureshoTermelseif choice = "line 144 of card field 1"thenput "G144.PIC" into termput "G144.PIC" into thePictureshoTermelseif choice = "line 145 of card field 1"thenput "G145.PIC" into termput "G145.PIC" into thePictureshoTermelseif choice = "line 146 of card field 1"thenput "G146.PIC" into termput "G146.PIC" into thePictureshoTermelseif choice = "line 147 of card field 1"thenput "G147.PIC" into termput "G147.PIC" into thePictureshoTermend ifend ifend ifend ifend ifend ifend ifend ifend ifend compareTson compareUsglobal term, choice, thePictureif choice = "line 148 of card field 1"thenput "G148.PIC" into termput "G148.PIC" into thePictureshoTermelseif choice = "line 149 of card field 1"thenput "G149.PIC" into termput "G149.PIC" into thePictureshoTermelseif choice = "line 150 of card field 1"thenput "G150.PIC" into termput "G150.PIC" into thePictureshoTermelseif choice = "line 151 of card field 1"thenput "G151.PIC" into termput "G151.PIC" into thePictureshoTermelseif choice = "line 152 of card field 1"thenput "G152.PIC" into termput "G152.PIC" into thePictureshoTermelseif choice = "line 153 of card field 1"thenput "G153.PIC" into termput "G153.PIC" into thePictureshoTermelseif choice = "line 154 of card field 1"thenput "G154.PIC" into termput "G154.PIC" into thePictureshoTermelseif choice = "line 155 of card field 1"thenput "G155.PIC" into termput "G155.PIC" into thePictureshoTermelseif choice = "line 156 of card field 1"thenput "G156.PIC" into termput "G156.PIC" into thePictureshoTermelseif choice = "line 157 of card field 1"thenput "G157.PIC" into termput "G157.PIC" into thePictureshoTermelseif choice = "line 158 of card field 1"thenput "G158.PIC" into termput "G158.PIC" into thePictureshoTermend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend ifend compareUson compareVsglobal term, choice, thePictureif choice = "line 159 of card field 1"thenput "G159.PIC" into termput "G159.PIC" into thePictureshoTermelseif choice = "line 160 of card field 1"thenput "G160.PIC" into termput "G160.PIC" into thePictureshoTermend ifend ifend compareVson compareWsglobal term, choice, thePictureif choice = "line 161 of card field 1"thenput "G161.PIC" into termput "G161.PIC" into thePictureshoTermend ifend compareWson compareZsglobal term, choice, thePictureif choice = "line 162 of card field 1"thenput "G162.PIC" into termput "G162.PIC" into thePictureshoTermelseif choice = "line 163 of card field 1"thenput "G163.PIC" into termput "G163.PIC" into thePictureshoTermend ifend ifend compareZson shoTerm picTermglobal term, thePictureput "PLANETS:GLOSSARY:TERMS_MAC:"&term&"" into picTermlock screennoPaintWhitepicture picTerm,file,rect,false,8set loc of window thePicture to "60,39" --test the locationnoPaintWhiteshow window thePicturenoPaintWhiteunlock screenend shoTerm</script>
